ocr: File Edit Info Deu Tools Controls Layout Dindows 9:49 PM Tour Oberon/F education version (1.2). - Copyright Oberon microsystems, Inc.; Zurich, Switzerland - not for commercial use! customerID*: LONGINT; 5MB available rd Disk getsel adr Text Oberon'F education version (1.2) -Copyright Oberon microsystems, END; 6 E PROCEDY name ce Drivem YARE: BEGIN email t=Tex f.Conn cUsk nerID f.Write J f.Writed getsUpdates IFadr. 9 f.Writel Text V=Tet Yiews. E 5 LE adr.name : ; adr.email := ; adr.customerlD : 0; adr.getsupdates : FALSE; Dialog.Updatefadr) ENDText:
